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About This Book 

This book contains simple games 
programs to play on a microcomputer. 
They are written for use on ZX8 1 , ZX 
Spectrum, BBC, VIC 20, 
TRS-80 and Pet and Apple micros, and 
many are short enough to fit into the 
ZX81's IK of memory. 

Most micros use the language BASIC, 
but they all have their own variations or 
dialects. In this book, the main listing for 
each program works on the ZX8 1 and 
lines which need changing for the other 
computers are marked with symbols and 
printed underneath. The fact that the 
programs are written for several micros 
means that they do not make full use of 
each one's facilities. You could try 
finding ways of making the programs 
shorter and neater for your micro. 

For each game, there are ideas for 
changing and adding to the programs 
and towards the back of the book you 
will find tips and hints on writing games 
of your own. Also in the book is a 
conversion chart to help you adapt 
programs in magazines and other books 
for your micro and a summary of the 
BASIC terms used in this book. 

Typing in the programs 

Lines which need changing for 
computers other than ZX8 1 are marked 
with these symbols: 

* VIC and Pet 

* BBC and Acorn Electron 
■ TRS-80 

* Apple 

" ZX Spectrum 

Every time you see the symbol for the 
micro you are using, look below for the 
corresponding line number with the 
same symbol and type that in instead. 




Points to remember 

1 Type the lines exactly as they are printed 
including all punctuation and spaces. 

2 Press RETURN, NEWLINE or ENTER 
key at the end of each program line. 

3 Check each line as you go. 

4 Make sure you don't miss out a line or 
confuse one with another. A piece of paper 
or a ruler is useful to mark your place in 
the listing. 

5 Look out for the symbols and make sure 
you use the correct lines for your 
computer. 

6 If you are using a ZX8 1 or ZX Spectrum, 
remember not to type the program 
instructions letter by letter but to use the 
special key for each instruction instead. 

You may find it easier to get someone to 
read the program out to you while you 
type it in. Don't forget to explain that they 
must read every comma, fullstop, bracket 
and space and differentiate between letter 
"O" and zero, FOR and 4, and TO and 2. 

Debugging programs 



When you have typed 
in the program, check 
your manual to find out 
how to display it on the 
screen. (Usually you 
type LIST followed by 
the line numbers of the 
section you want t o 
see.) 



VIC 20 versions of all except the graphics program should workon 
Pet computers. 




Check you have 
typed everything 
correctly. It is easy to 
make mistakes, so 
expect to find some. Use 
your manual to find out 
how to make changes to 
the program once it is 
typed in. If in doubt, you 
can always type the line 
again. All the computers 
will replace an existing 
line with a new one with 
the same number. 
Here is a checklist of common 
mistakes to look out for: 

1 Line missed out 

2 Line wrongly numbered 

3 Thebeg^nrungofonebnejoinedonto 
the end of another. 





4 Brackets, commas, colons, semi- 
colons, fullstops or spaces missed out, 
especially in long, complicated lines. 
Watch for double brackets in particular . 

5 Wrong line used for your computer. 

6 Letter "O" confused with zero. 

7 Wrong numbers used, e.g. extra zeros 
included. 

Playing the games 

To start the game you must type RUN. In 
some games things happen very quickly, 
so make sure you have read the 
instructions and know what you are 
supposed to do. 

It is quite likely that the program still 




has a mistake in it and either won't 
at all or the game won't work properly 
Sometimes your computer will give yo 
an error code which you can look up in 
the manual. This may help you find the 
mistake, though not always. List the 
program again and check it carefully 
against the book. 

When the game is over, the computer 
will usually say something like BREAK IN 
LINE 200. To play again, you have to type 
RUN. 

Experimenting with the games 

There are suggestions for changing and 
adding to the programs throughout the 
book, but don't be afraid to experiment 
with changes of your own. You can't 
damage the computer and you can 
always change back to the original if the 
changes don't work. 

You will probably find you want to 
adjust the speed of some games, * 
especially after you have played them a 
number of times. You will find out which 
line to change on each program page. 

Wherever you see 
PRINT, you can 
change the message in> 
quotes that follows it to J 
whatever you like. 
Also, unless you have 
ZX81 with only IK, you 
can add extra 
messages. 
Type a line number (say 105 if you want 
to add a message between lines 100 and 
1 10), then type PRINT, then your 
message inside quotes. 

If your computer can make colours 
and sounds, you could use your manual 
to find out how they work and try adding 
them to the games in this book. 





*See page 37 for a special note for BBC and Spectrum users. 




Robot Missile 



The year is 2562 and the people of Earth are in the 
midst of battle against the Robots. A lethal Robot 
Missile has just landed and everyone is depending 
on you to find the secret code which unlocks its 
defuse mechanism. If you fail, the entire Earth 
Command Headquarters will be blown up. 

Your computer knows what the code 
letter is. You must type in your guess and 
it will tell you whether the code letter 
is earlier or later in the alphabet. 
You have four chances to find the 
correct letter before the missile 
blows up. 




10 PRINT 
20 PRINT 
30 PRINT 
40 PRINT 



"ROBOT MISSILE" 



"TYPE THE CORRECT CODE " 
"LETTER <A-Z> TO" 
50 PRINT "DEFUSE THE MISSILE. " 
60 PRINT "YOU HAVE 4 CHANCES" 
70 PRINT 



b*«a«80 LET C*=CHR» (37+INT (RND*26+1 > )■ 



How the program 
works 



These lines print the title and 
instructions. 





This selects a number 
between and 26, converts it 
to a letter (the "secret code") 
and puts it in CS. 



90 FOR G=l TO 4 
lOO INPUT G* 



Line 90 begins a loop which 
' makes lines 100-140 repeat 4 
times. 

— Puts your guess in GS. 



110 IF B*=C* THEN GOTO 210 



120 IF G*<C* THEN 
130 IF G*>C* THEN 
140 PRINT " THAN 



150 NEXT 6 



160 
170 
1 SO 
190 
200 
210 
220 
230 



PRINT 

PRINT 

PRINT 

PRINT 

STOP 

PRINT 

PRINT 

STOP 




"BOOOOOOOOMMM " 

"YOU BLEW IT. " 
"THE CORRECT CODE WAS " ; C* 



1 Checks if your letter is the 
same as the "secret code" in 
CS. If so computer jumps to 210. 

Checks if secret code letter is 
earlier or later in the 
alphabet than yours and 
prints an appropriate 
message. 

End of loop. Goes back for 
next turn. 

- This prints if all your guesses 
were wrong. 



"TICK. . .FZZZZ, 
"YOU DID IT" 



CLICK. 



This prints if y on guessed 
right. 



The above listing will work on a ZX8 1 . For 
other computers, make the changes below. 

*A«80 LET C»=CHR» (64+INT (RND < 1 ) *26+l > ) 
■ 80 LET C*=CHR» (64+INT (RND (O) *2e»+l) > 
sBO LET C*=CHRt (64+INT (RND *2f>+l) > 



Adding to the program 

Yon can make the computer print an 
extra message for a correct guess on the 
last go, Change line 220 by adding a 
semicolon to it, like this: 

220 PRINT "YOU DID IT"; 
and add a new line 230: 

230 IF G=5 THEN PRINT "(JUST)" 




Puzzle corner 



See if you can work out how to change 
the program to give you more or less 
chances of guessing the code le.tter. 



The Vital Message 




Sir 




m 




1V£ 



You are a laser 
communications 
operator. Your 
job is to intercept 
robot messages and relay 
them to Command HQ. A vital 
code message is expected. If you 
relay it correctly, the Robot attack 
will be crushed. 

This game tests your skill at 
remembering a group of 




letters which you 
see for only a very 
short time. The computer 
will ask you for a difficulty 
from 4 to 10. When you have typed 
in your answer, letters will appear 
top left of your screen and disappear 
again fairly quickly. Memorize them 
and then type them into the computer 
and see if you were right. 



How the program works 



Af)10 CLS i 



20 PRINT "VITAL MESSAGE" 
30 PRINT 

40 PRINT "HOW DIFFICULT? (4-10) 
SO INPUT D 

60 IF D<4 OR D>10 THEN GOTO 40- 



• Clears screen before game starts. 



Asks you for a "difficulty number" and 
inD. 



I— puts it 



70 LET M*=" 



BO FOR 
|b+»a»90 LET 



Checks your number ianH less than 4 
or more than ID, 

Sets up an empty ("null" in computer 
language) string labelled MS in which 
the computer can store the secret 
message. 

1 = 1 TO D ~ 1 Computer loops round D times. Each 
M*=M*+CHR* ( INT (RND* 26+38) ) L loop it chooses a letter and adds it to 




100 NEXT I 



A«U0 

120 
130 
140 

*HA«150 

160 



CLS 
PRINT 
PRINT 
PRINT 



the string of letters it has already 
chosen and pat in MS. 



■SEND THIS MESSAGE; 



M* 



FOR 1=1 
NEXT I 



TO D*B 



A«170 CLS- 



Clears screen and then prints the 
message. 

Message stays on screen while 
> computer loops round, doing nothing, 
for a number of times depending on D. 

' Clears screen when loop has finished. 



1B0 INPUT N*- 



190 IF N*-M* THEN GOTO 240' 



3- 



■ Pots your version of the message in 

NS. 

> Checks if your message is the same a 
the message in MS and Jumps to 240 
if it is. 



200 PRINT "YOU GOT IT WRONG" 
210 PRINT " YOU SHOULD HAVE SENT 
220 PRINT M* 
230 GOTO 260 

240 PRINT "MESSAGE CORRECT" 
250 PRINT "THE WAR IS OVER" 
260 STOP 

The above listing will work on a ZX81 . For 
other computers, make the changes below. 

#10, 110, 170 HOME 
A10.U0, 170 PRINT CHR*U47) 
*A«90 LET M*=M*+CHRS ( INT (RND(l) 126+65) 
■90 LET M*=M*+CHR*<INT(RNDC0>*26+65) 
190 LET M»=M*+CHR* ( INT (RND * 26+65) ) 
■ A* 150 FOR 1 = 1 TO DV1B0 
+150 FOR 1=1 TO D*40O 



Prints if you are wrong, telling you 
what the message should have been. 




How to make the game harder 

Toucan change the program to include 
numbers and punctuation marks in the secret 
message. Do this by changing line 90 as follows: 

«90 LETM$=M$+CHR$(INT(RND*43+21)) 
*a«90 LET M$ = M$+ CHR${INT(RND(1)*43+ 48)) 
■90 LETM$=M$+CHR$ONT(RM3(0)*43+48))| 
■90 LETM$=M$+CHR$(INT(RND*43+48)) 



Puzzle corner 

Can you work out how to make 
the message stay on the screen 
longer? 



Ton are standing back to 
back. Yon take 1 paces, turn 
and reach for your gun. How 
quick are you? Can you 
shoot first? 

Your computer prints the 
numbers 1 to 10 to represent 
the 1 paces, pauses and 
en prints HE DRAWS . . . 
You must be ready to press j 
key (any one will do) th j 
tAtantthese words c< 
the screen. If you are quid , 
enough, you will win. Don't 
* -jpress a kW before HE 
^^BRAWS comes up orV«*erwill 
p^jPftoataticallylOse. 




# *^0 PRINT 
70 NEXT 



80 PRINT 
★■±•90 FOR 1=1 TO RND*200 
1O0 NEXT I 




ft 
ft 



How to change the 
speed of the game 

You can adjust the time you 
have to react to the message 
and press a key by changing 
the last number in line 130. A 
smaller number will give you 
less time. (For the BBC, 
change the number in 
brackets in line 140.) 



A* 10 CLS 

20 PRINT "COWBOY SHOOTOUT -" 
30 PRINT "YOU ARE BACK TO BACK" 
40 PRINT "TAKE 10 PACES. . . " 



50 FOR 1= 



1=1 TO 10~L 



★A»11G IF INKEY*<>"" THEN GOTO 160 
120 PRINT "HE DRAWS ": — 



★ ■*• 130 FOR 1 = 1 TO 5 

★A* 140 IF I NKEY*< > " " THEN GOTO 190 
★150 NEXT I 

To ^. 



■> 




160 PRINT 
170 PRINT 
1BO GOTO ; 



"AND SHOOTS 
"YOU ARE DEAI 
10 



190 PRINT "BUT YOU SHOOT FIRST. " — 
200 PRINT "YOU KILLED HIM." 
210 STDP 
The above listing will work on a ZX81. For 
other computers, make the changes below. 

•10 HOME 

A 10 PRINT CHR*<147) 
★60 PRINT ; I ; 
★ ■A«65 FOR J=l TO 300 : NEXT J 
★ ±•90 FOR 1 = 1 TO RND(1>*1000 
■90 FOR 1=1 TO RND(0)*1000 
•110 IF PEEKC-163B4) >127 THEN GOTO 160 
A110 BET I* : IF I*<>"" THEN GOTO 160 
★110 IF INKEY»(1><>"" THEN GOTO 160 
•130 FOR 1=1 TO 20 
■ A130 FOR 1 = 1 TO 50 
★DELETE 130,150 

•140 IF PEEK<-163B4) >127 THEN GOTO 190 
A 140 GET IS : IF ISO"" THEN GOTO 190 
★140 IF INKEY*(40)<>"" THEN GOTO 190 



Making the game harder 

If you change the program as follows, you will add 
the possibility of you missing sometimes: 
1) In line 140, change 190 to 220. 
) Add these lines: 



8 ZX 220 IF RND> .3 THEN GOTO 190 
★A«220 IF RND( 1)>.3 THEN GOTO 190 
■230 IF RND<0}> .3 THEN GOTO 190 

230 PRINT "BUT YOU MISSED" 

240 GOTO 90 



How the program works 



This is a loop which sends the 
computer round 1 times to 
print a number and two dote 
■ each time. 

Another loop - this time lo 
make the computer delay. 
The computer loops r ound a 
, number of times depending 



on the value of RND, doing 
nothing. 

Checks you're not cheating 

■ by pressing a key before HE 
DRAWS comes on the screen. 

■ Prints the signal for yon to 
press a key. 

Checks the keyboard to see if 
, you are pressing a key, and 
jumps to 190 if you are. 
(Notice that line 140 is in the 
middle of a FOR . . . NEXT 
loop. This makes the 
computer check the 
keyboard a number of times 
to give you a reasonable 
chance of pressing a key.) 





See if you can work out * 
how to make it possible 
for the computer to miss 
too. 



Desert Tank Battle 



The last major stronghold of Robot forces outside the U.R.S* is hidden in ancient 
castle ruins in the middle of the desert. A fleet of desert hovertanks has been sent 
to destroy it and you are the commander. Your tank controls the five remaining 

missiles. 

You must assess carefully the direction and elevation before you launch each 
one. Your computer will ask you for a direction angle between —90° (extreme left) 
and +90° (extreme right) and an elevation angle between 0° (along the ground) and 
90° (straight up in the air). The elevation determines the distance the missile will 

travel. 

Is your aim good enough to destroy the robot stronghold? 




10 PRINT "DESERT TANK BATTLE" 
★■▲•20 LET T=INT(RNDSlBl)-90 — 



★■▲•30 LET D=RND • 



How the program works 

This selects a whole number 

■ between —90 and 90 for the 
direction. 

■ This selects a number 
between and 1 for the 

40 FOR B=l TO 5 ~ 1 distance of the castle from 

50 PRINT "DIRECTION (-90 TO 90) ?" I y ° U " 

60 INPUT Tl I Get your guesses and pats 

70 PRINT "ELEVATION <0 TO 90) ?" them in A and B. 

80 INPUT B -I 

Uses your elevation angle to 

■ calculate the distance your 
missile went. (Answer will be 
between and 1). 

100 IF ABS(T-T1)<2 AND ABS(D-D1X.05 THEN GOTO 220 If y OUT 

direction was within 2 degrees 
and your distance within 0.05, 
"ABS takes the "absolute" \ then you have hit the castle, 
value of a number, which j Program jumps to line 2 20 to 
means it ignores + or — J tell you so. 
signs. 

110 PRINT "MISSILE LANDED " ; "1 Compares your direction 

120 IF TKT THEN PRINT "TO THE LEFT " ; U angle with the number 
130 IF T1>T THEN PRINT "TO THE RIGHT "jl chosen in line 20 and prints 

an appropriate message. 



90 LET D1=SIN<2* CB/1B013, 1416) >■ 




THEN 




PRINT "AND " ; Decides 
whether to print "and" by 
comparing the distance 
your missile travelled with 
the number chosen in tine 30. 



160 
170 
ISO 
190 
200 
210 
220 
230 
240 



IF Dl 
PRINT 
NEXT G 
PRINT 
PRINT 
STOP 
PRINT 
PRINT 
STOP 



THEN PRINT 



NOT FAR ENOUGH" 
FAR" j 



• Prints a message 
if your shot was 
too long or short. 



DISASTER - 
RETREAT IN 

1 * K AB000MMM I 
'YOU'VE DONE 



YOU FAILED 
DISGRACE" 



> Prints if you lose. 



IJ "S 



■Prints if you win. 



The above listing will work on a ZX8 1. For 
other computers, make the changes below 
*A«20 LET T=INT<RND(1> *181)-90 
■20 LET T-INT (RND(O) *181 > -90 
+A«30 LET D=RND(1> 
■ 30 LET D=RND(0> 





Puzzle corner 



Can you work out how to add the 
possibility of the robots seeing you and 
shooting at you before your five goes 
are up? 



'United Robot States 



Battle at Traitor's 
Castle 



I 




10 PRINT "TRAITOR'S CASTLE" 
20 LET S=0 



30 FOR G=l TO 10 



40 LET R*= 



+ BA«50 LET T=INT tRND*9+l )■ - 

60 FDR L=l TD 9 
70 IF L=T THEN LET R*=R*+"0" 
BO IF LOT THEN LET R*=R»+" . 
90 NEXT L 



lOO PRINT R«, ■ 



The King is waging a fierce and 
bloody battle against his 
deadliest enemy - the Traitor 
Baron. You are one of the King's 
crack bowmen and at this very 
moment you are crouching 
behind the bushes outside the 
Baron's Castle, shooting at his 
men as they lift their heads above 
the battlements. 

Your computer will print a row 
containing eight dots and an O. 
The number keys 1 to 9 
correspond to the position of the 
in the row. You have a short time 
to press the correct key, and hit 
the O, before it disappears. 

How many of the Baron's men 
can you hit? 



★■±•110 FOR 
*X«120 LET 



1 = 1 TO 
I*=INKEV* 



130 IF VAL("0"+IS)=T THEN GOTO 170- 
140 NEXT I 



150 PRINT "MISSED" 
160 GOTO 190 
170 PRINT "GDOD SHOT* 

ISO LET S=S+ 1 

190 NEXT G 



200 PRINT "YOU HIT "|5; "OUT OF 10' 
210 STOP 

The above listing will work on a ZX8 1 . For 
other computers, make the changes below. 

■50 LET T=INT(RND(0)*9+1) 
*A«SO LET T=INT(RNDU>«9+1> 
A 1 10 FDR 1 = 1 TO 200 
■ 110 FOR 1 = 1 TO 60 
★ •110 FOR 1=1 TO 90 
•115 LET 1*="" 
1*120 LET I*=INKEV*(1> 

|»120 IF PEEK(-163B4) >127 THEN BET I* 
* 120 GET I* 







Making the game faster or slower 



You may find that the computer works too quickly 
or too slowly for you in this game. You cart adjust 
this by changing the last number in line 1 10. A 
lower number will make the game faster. 



How the program works 

Sets your score to zero for 

■ start of game. 

■ Beginning of loop which 
gives you 1 goes. 

• Sets up an empty string, RS. 

• Selects a number between 1 
and 9 and pats it in T. 

Loops round 9 times, adding a 
character to the string, RS, 

• each time. The character is O 
for the position 
corresponding to the number 
is T and a dot for all the others. 

- Prints the string. 

Loops round a number of 

■ times to see if you are 
pressing a key. (End of loop at 
Line 140} 

■ Checks if you are pressing 

the right key. Jumps to 170 if so. 

Prints if you pressed the 
-wrong key or didn't press in 
time, then jumps to 190. 



■ Increases your score by 1 . 

■ Sends computer back to line 
30 for another go. 

■ Prints your score when 10 
goes are up. 



Puzzle corner 

Can you change the program so that you get two 
i lands of t arget - either O (one of the Baron's 
Ordinary soldiers) which is worth 1 point, orS 
(one of his Special branch) which is worth S 
points? 



9 



<L1 



Notice how the scoring works 
in this program (lines 20 and 
180). You could try adding 
this to other programs. 





Robot Invaders 



You must act quickly. 
Robot invaders of all kinds 
are approaching. You 
have plenty of weapons, 
but for each type of Robot 
you must select exactly 
the right one for it to have 
any effect, 

Code symbols for each 
Robot will flash up on your 
screen. Quickly press the 
key with that symbol on it 
- beware, some need the 
shift key too - and see how 
many Robot invaders you 
can destroy. 



10 PRINT "ROBOT INVADERS" 
20 LET H=0 

30 FOR T=l TO 25 



★■▲•40 

50 



FOR 1=1 
NEXT I 



TO INT (RND* 30+20) 



★■A»60 LET 
★■*»70 LET 

■★■A* SO LET 
A»90 CLS 



20!*| 
15>J" 



} 



A=INT(RND*20> 
D= I NT (RND* 

P»=CHR* ( INT (RND* 53+ 11) )■ 



100 
110 
120 



FOR J=0 
PRINT 
NEXT J 



TO 



130 PRINT TAB (A) ; P* 



★■a»140 FOR 1=1 TO 15 
•?A»150 LET R*=INKEY* 

160 IF R*=PS THEN GOTO 210 
170 IF R*<>"" THEN GOTO 190 
180 NEXT I 
190 PRINT "MISSED" 
200 GOTO 230 
210 PRINT "A HIT" 

220 LET H=H+1 

230 NEXT T 

**240 CLS 

250 PRINT "YOU SCORED "tHtV25' 
260 STOP 



How the program works 

■ Seti score to zero for start 

- Beginning of loop which 
gives yon 25 goes. 



- Random delay. 

Selects numbers for across 
and down positions on 
• screen. 

-Chooses a keyboard character. 
-Clears screen 

Moves cursor down the 
screen, one line at a time, 
-until it reaches line number D 
(which was chosen in line 70). 



- Moves cursor A spaces 
across the screen and prints 
the character chosen in line 
80 there. 

-Checks keyboard a number 
of times to see if you are 
pressing a key, checks if this 
is the right key and then 
jumps to the appropriate line 
to print hit on 



■ Increases score by 1, 
-Goes back for another turn. 



■Prints score after 25 goes. 



m 



3n 



le above listing will work on a ZX8L For 
other computers, make the changes below. 

**»40 FOR 1 = 1 TO INT (RND <T) S300+200) 
■40 FDR 1=1 TO INT(RND(0)*300+20o> 
*A»60,70 change RND to RND ( 1 ) 
■60,70 change RND to RND CO) 
*A»B0 LET P»=CHR*(INT(RND(l)*5S+33) ) 
■80 LET PS-CHRS ( INT (RND (0) $58+33) ) 
880 LET P*=CHRS (INT (RND* 58+33 ) ) 
•90,240 HOME 
A90.240 PRINT CHR»(147) 
★ ■A»140 FOR 1=1 TO 150 
•145 R*=" " 
★150 R*=INKEY*(1) 
A150 SET R* 

•150 IF PEEK (-16384) >127 THEN GET RS 




Puzzle corner 

These are 
the most 
dangerous of 
the robots. 




Speeding up the game 

As yon get used to playing this 
game, you will probably find 
you want to speed It up. Do this 
by changing the last number in 
line 140 to a lower one. 
Moving the cursor 
Your computer may have a 
simpler way of moving the 
cursor to a particular point on 
the screen (see lines 100-130). 
Check your manual and see . 



$ + f t 



Medians Tintroids 



W X Y 

Scrapions Wire he ads Steeleyes 



Can you adjust the program so that you get 1 00 points for each of these and 
only 1 points for any of the others? 



Secret Weapon 



If you could destroy the main Robot Spare Parts Store, which lies 
underground somewhere in the eastern wastes of the U.R.S., you could 
cripple the robot attack quite severely. 

You have a new secret weapon, as yet unknown to the robots, which 
can cut silently through solid rock, vapourizing everything in its path. 
The Store is very cleverly concealed though. All you can do is aim 
your weapon blindly and hope you get somewhere near the target. 

Your computer will ask you for a difficulty number (the 
smallest number allowed is 4) and then ask foryour 
guesses for the X and Y coordinates of the target. (Enter 
these separately, pressing RETURN, NEWLINE or 
ENTER after each one.) 

For a clue to the possible 
values of X and Y, look 
carefully at the program 
listing. 






16 




I 



A* 10 CLS 

20 PRINT 
30 PRINT 



40 

50 

★■A* 60 
★■ASJ70 

80 



"SECRET WEAPON " 
"ENTER DIFFICULTY 
INPUT D 

IF D<4 THEN GOTO 30 



How the program works 



Gets a difficulty number from 
you, puts it in D and checks it 
•knot less than A. 



LET X=INT<RND*D+ 
LET Y=INT(RND*D+ 
FOR G=l TO D+5 — 



■ Selects numbers for X and Y. 



90 PRINT "GUESSES FOR X AND Y" 
1O0 INPUT XI 
110 INPUT Yl 



} 



- Beginning of loop which 
gives yon a number of goes 
depending on the difficulty 
you chose. 

■ Gets your guesses and puts 
them in XI and Yl. 



120 LET Z=SQR( < X-X 1 > * < X-X 1 > + < Y-Yl > * (Y-Yl) ) 




•Works out the 
distance between 
your shot and the target and puts 
the answer in Z. 



Checks Z to see how close 



130 IF Z=0 THEN GOTO 200 you were and prints a 

140 IF Z<=3 THEN PRINT "CLOSE" I message. (HZ = you've 

150 IF Z>3 THEN PRINT "NOT EVEN CLOSE J won.) 

160 NEXT 6 ■ End of loop. Goes back for 

next turn. 



170 PRINT 
ISO PRINT 

190 STOP 

200 PRINT 
210 PRINT 

220 STOP 



"THE ROBOTS HAVE SEEN" 
"YOU - AGGHHHHH " 



Prints when youVe used all 
your goes. 



"YOU DESTROYED 
G; " GOES" 



IT IN 



■ Prints if you were successful 



The above listing will work on a ZXSl.For 
other computers, make the changes below. 

■HO HOME 

A 10 PRINT CHR*(147) 
★a»60 LET X=INTCRND<i)*D+l> 

■60 LET X=INT (RND (O) *D+1) 
*A«70 LET Y=INT(RND(1)*D+1) 

■ 70 LET Y=INT (RND <0) *D+1 > 



Puzzle corner 



Can yon work out how to add the 
following scoring system? 

Score 1 point for each time yon 
are close. 

Score 10 points fox a win. 



Escape! 



The Robots have caught you, taken your weapons and locked you up. 
Suddenly you remember you still have your sonar wristwatch, which can be 
tuned to produce sounds of any frequency. If you can only find the resonant 
frequency of your Robot guards, they should vibrate so much they fall apart. 

You must be careful not to use frequencies that are too low or the building 
will vibrate and collapse on top of you. If you go too high, you will get such a 
terrible headache you will have to give up. 

Can you escape the horrors of the Robot prison? (Look carefully at the 
program for a clue to the range of frequencies to try.) 



▲•10 

20 

★■A«30 

40 

50 



CLS 

PRINT "ESCAPE " 
LET F=INT (RNDf 100+1 ) 



LET 
LET 



Si} 



60 FOR G=l TO 5 



70 
80 



PRINT 
INPUT 



"SUESS7 
Fl 



■•} 



90 IF ABS(F-F1)<5 THEN BBTO 290- 



100 IF F-F1>40 THEN BOTO 170- 



110 IF F1-FM0 THEN BOTO 230- 

120 PRINT "NO VISIBLE EFFECT " 

130 NEXT G 

140 PRINT "YOU TOOK TOO LONB. 

150 PRINT "THE FREQ. WAS "|F 

160 STOP 

170 IF L=2 THEN GOTO 210 

1 80 PR I NT " TOO LOW . . . CAREFUL " 

190 LET L=2 

200 GOTO 130 

210 PRINT "THE BUILDING COLLAPSED" 

220 STOP 

230 IF H=2 THEN GOTO 270 

240 PRINT "TOO HIBH OUCH" 

250 LET H=2 

260 GOTO 130 

270 PRINT "YOUR HEAD ACHES - BIVE UP" 

2BO STOP 

290 PRINT "YOU'VE DONE IT" 

300 STOP 

The above listing will work on a ZX8 1 . For 
other computers, make the changes below. 

•10 HOME 

AlO PRINT CHR*(147) 
*A«30 LET F=INT(RNDU>*10O+l) 
18 "30 LET F=INT(RND(O)*10O+l) 



How the program works 

Chooses a number between 1 
and 100 for frequency of 

• robots and puts it in F. 

Puts 1 in LandH. These are 
» used if yon go too low or too 
high- see lines 170-190 and 
230-250, 

- Beginning of loop which 
allows you to have 5 turns. 

-Getsa guess from you and 
puts it in Fl. 

• Checks if your guess is 
within S of F. If it Is, jumps to 
290 to print YOU'VE DONE IT. 

- lumps to 1 70 if your guess is 
so low it is less than F by 
more than 40. 

- Jumps to 230 if your guess is 
so high it is more than F by 
more than 40 

■ Prints if your guess was 
within 40 of F and goes back 
for next torn. If all turns have 
been used, it prints the answer. 

Checks the value of L. The 
first time this part of the 
program is reached, L is 1, So 

- the computer moves down 
the program to print a 
wanting, change L to 2 and go 
back for another turn. 

Next time line 1 70 comes into 
operation the program jumps 
straight to 210 to tell yon 
you've lost. 

• These lines check H in the 
same way to give you a 
warning first time you go too 
high and tell yon you've lost 
the second time . 



Puzzle corner 



The three Robot guards 
each have their own 
resonant frequency. You 
can't escape until you 
have found all three. How 
could you change the 
program to do this? 




How to make the 
game harder 

Change the S in line 90 to a 
lower number. This means 
you have to get closer to F 
to win. You can also 
increase the possible 
range of F by changing 
1 00 in line 30 to a higher 
number. 




Pirate Dogfight 

It's you against the Sky Pirate. He moves ahead, you accelerate - He 
drops behind, you slow down. You must try to get level with him and then 
you can fire, hoping that he won't be able to fire and hit you first. 

Use the letter keys A to accelerate, D to decelerate and F to fire. Your 
computer will tell you your speed and position relative to the pirate. You 
will need to be ready to press the appropriate keys as soon as you press 
RUN, Keep pressing A and D until you get level and thenfire. 



A #10 CLS 



20 PRINT "PIRATE DOGFIGHT" 
★■▲•30 LET V=INT(RND*ll-5> 



★■▲•40 LET S— INT(RND»3f 1) 



50 IF ABS(S)>20 THEN GOTO 230- 
A»60 CLS 

70 PRINT "YOU ARE "; 
SO IF S<0 THEN PRINT "BEHIND" 
90 IF S>0 THEN PRINT "AHEAD" 
100 IF S=0 THEN PRINT "LEVEL" 
110 PRINT "YOU ARE GOING "; 
120 IF V>0 THEN PRINT " FASTER" 
130 IF V<0 THEN PRINT " SLOWER " 
140 IF V=0 THEN PRINT "SAME" 

*A»150 LET I*=INKEY* 

160 IF I*="A" THEN LET V=V+1 
170 IF I*="D" THEN LET V=V-1 
180 IF I*="F" AND S=0 THEN GOTO 



How the program works 

Chooses a number between 
—5 and + 5 for your speed 
relative to pirate and puts it 
inV. 



Chooses a number for your 
distance from the pirate 
■ and puts it in S. This is 
negative at the start, 
which means you 
are behind him. 



25C>] 



20 



Checks if the distance 
between you is more than 20. 
If so, computer jumps to 230 
to say you've lost sight of 
him. 

Checks the values of S and V 
and prints your position and 
speed in relation to the pirate. 

Looks to see if you are 
pressing a key and, if so, 
which one. If it Is A, your 
speed is increased by 1. If D, 
your speed is decreased by 1. 
If you are pressing F and S =0 
(i.e. you're level) then it 
jumps to 250. (If S is not 
when you press F then 
nothing happens.) 



190 LET S=S+V 



★■±•200 

210 
220 
230 
240 



FOR 1=1 TO 
NEXT I 
GOTO 50 — 
PRINT "YOU 
GOTO 330 



LOST SIGHT OF HIM* 



250 IF ABSWK2 THEN GOTO 290 



260 PRINT "YOU ONLY MANAGED 
270 PRINT "SCARE HIM. " 
280 SOTO 40 

★■A«290 IF RND>.7 THEN GOTO 320 

SHOT HIM DOWN" 



TO "| 

J— 



300 PRINT " YOU 
310 BOTO 330 

320 PRINT "HE SHOT FIRST" 

330 STOP 
The above listing will work on a ZX8 1 . For 
other computers, make the changes below. 

• 145 

■10,60 HOME "*150 

A 10, 60 PRINT CHR«C147> •150 

*A«30 LET V=INT<RND(l)»ll-5) A 150 GET 

■30 LET V=INT(RND(0>»11-S> *BA»2O0 FOR 
*A»40 LET 8— INT(RND(1)«3+1) 

■40 LET 5=-INT<RND(0)*3+i> 



Works out the new distance 
between you. 

Delay loop. 

Goes back to 50 to repeat. 

Comes into operation if yon 
fired when level. Checks 
speed is less than 2 (ignoring 
+ and — signs) and if so, 
jumps to 290. 

Prints a message if speed was 
more than 2 when you fired. 
Returns to 40 to start again 
with anew value for S. 

Applies a random test to see 
if yon fired before the pirate. 

Prints a message depending 
on the result of the test in 290. 



I*=INKEY*<1> 

IF PEEK (-163B4) >127 THEN SET 
I* 

1=1 TO 200 



I* 



■ 290 IF RND<0> >. 7 THEN BOTO 320 
*A»290 IF RND<1>>.7 THEN GOTO 320 



How to make the game easier 

Yon may find this game quite difficult. 
To make it slightly easier, add these two 
lines. You will then be able to see the 
relative positions of the two planes 
printed on the screen, 

195 IF ftBS(S)>10 THEN GOTO 200 

196 PRINT TAB(w/2> ; "HIM" 

197 PRINT TAB<S+n/2> ; "YDU" 

Replace w with the width of your screen. 




Puzzle corner 



The random test in line 290 is loaded in 
your favour. How could you change it so 
your chances of winning are equal? 
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Supersonic 
Bomber 




You are on a lone supersonic bombing 
mission over the U.R.S. Your computer 
shows graphs of Robot population based 
on infrared photographs relayed to it by 
satellite. You only have time to attack 
one target in five, so you must quickly 
select the one with the highest 
population of Robots and release one of 
your "Corrodajobe" bombs on it. (These 
contain a substance so corrosive it can 
dissolve a Robot's body in seconds.) 

To release a bomb, press the number 
hey which corresponds to the number 
next to the graph of highest Robot 
population. If there are two the same, 
choose the one with the lowest number. 

Will you be a hero when you return to 
base? 




# 



A»10 CLE 

20 PRINT "SUPERSONIC BOMBER' 



30 DIM B(5 
40 LET S=0 




50 FOR G=10 TO 1 STEP -1 



60 LET M=l 



70 FOR 1=1 TO 5 
★■A«S0 LET B(I>=INT(RND*10+1> 

90 IF B(I>>B(M) THEN LET M=I 
100 NEXT I 
A«110 CLS 

120 FOR 1=1 TO 5 
130 PRINT I; 
140 FOR J=l TO B < I ) 
150 PRINT "**■'; 
160 NEXT J 
170 PRINT 
180 NEXT I 
+B**H90 FOR 1=1 TO G*3 
★J •200 LET I*=INKEY* 

210 IF I*< >" " THEN SOTO 270 
NEXT I 

PRINT "TOO LATE" 
FOR J=i TO 10 
NEXT J 
GOTO 280 

IF VALU«>=M THEN LET S=S+1 

NEXT B 

PR I NT "YOU HIT ";S; 
PRINT "HIGH DENSITY 
IF S=10 THEN PRINT 
IF S<10 THEN PRINT 
STOP 



How the program works 

This sets up B as an "array 
variable". It can held five 
different values at a time, 
identifying them as B(l), B(2), 
B(3), B(4)andB(5). 

, Sets opening score at zero. 

Start of loop for 10 goes. Done 
backwards in this game (i.e. 
G=10 for first go, 9 for the 
second and so on). This 
allows the delay loop in line 
1 90 to give yon more time for 
the earlier goes. 

Sets number of highest 
population graph at 1 to start 
with. 

Chooses 5 numbers and puts 
, them in the array B(l ) to B(5), 
Checks which is biggest and 
changes M to correspond 
with It. 



220 
230 
★■A«240 

250 
260 
270 
2SO 
290 
300 
310 
320 
330 

The above listing will work, on a ZXB 1 . For 
other computers, make the changes below. 

•10, 110 HOME 

i 10, 110 PRINT Chfft* (147) 
*A«80 LET B(I> = INT<RNDU)*10+1> 

■80 LET B(I >=INT<RND(0) S10+1 > 



■ Prints the 5 numbers on the 
screen in the form of rows of 
stars. 



Checks if you are pressing a 
key and goes to 270 if you are. 

If you didn't press in time, 
prints TOO LATE and goes 
> back for next go . 

Checks If the key you 
pressed was correct and, if 
' so, increases your score by 1 . 

' Goes back for another go. 



" OUT OF 10" 

TARGETS" 
"YOU'RE A HERO" 
"TOUGH - YOU FAILED 



Prints score after 
10 goes. 



★ ■A«190 FOR 1 = 1 TO B»30 



•195 1*="" 
*200 I*=INKEY*(1) 
A 200 GET I* 

•ZOO IF PEEK (-16384) >127 
*BJA*>?40 FOR J=I TO 400 



THEN GET IS 



Changing the speed of the game 

To give yourself more chance of 
pressing a key each time, change the 
last number in line 190 to a higher one. 

As your skill improves, keep 
lowering the number in line 1 90. How 
low can you go and still win? 




Puzzle corner 



Can you work out how to make the 
computer give you more than 5 targets 
to choose from each time? 



Iceberg 



Your hull is badly damaged and 
you've no weapons to speak of. As 
you limp slowly home through 
treacherous iceberg-strewn waters, 
you become aware that an enemy 
ship is tailing you. Strangely it can 
detect you but not the icebergs, so 
your best chance is to lure it into 
hitting one. 

Your computer will print a grid 
showing the position of your ship 
(Y), the enemy (Z) and the icebergs 
( * ). You can move one space North, 
South, East or West each go. The 
enemy moves towards you by the 
most direct route (it can move 
diagonally too). If you move into any 
of the 8 positions surrounding the 
enemy, you will be captured, and if 
you hit an iceberg you will sink. 
Can you escape? 




10 PRINT "ICEBERG " 
20 DIH BC8,8) 



*■*• 30 LET N=INT<RND*8+4> 



40 FDR 1=1 TO N 
|s*«A«SO LET B<INT(RND*8+1> , INT (RNDS8+1 > > =23 
60 NEXT I 



*«A«70 LET SX = INT (RNDtB+1 ) 
*■ *eBO LET SY=INT <RND*8+1 > 

90 IF B(SX,SYK>0 THEN GOTO 70 
|&*>AS)100 LET B(SX.BY)=63 




#BA»110 LET YX=INT(RND»B+1> 

#BA»120 LET YY=INT(RNDSB+1> 

130 IF B(YX,YYX>0 THEN GOTO HO 

|s*«A*140 LET B(YX,YY>=62 

A«150 CLS 

160 FOR Y-l TO 8 
170 FOR X=l TO 8 
180 IF B(X,Y)=0 THEN GOTO 210 
190 PRINT CHR* (B (X, Y> ) ; 
200 GOTD 220 
210 PRINT ". "; 
220 PRINT " "; 
230 NEXT X 
240 PRINT 

250 NEXT Y _ 



How the program works 

This sets up the gild. Bis an 

■ "array" with the DIMensions 

8 by 8. 

■ N is the number of icebergs. 
It varies from 4 to 1 1 
depending on the value of 
RND. 

23 on ZX8 1 and 42 on the 
other computers is the code 
for * . Computer loops round N 
times putting * into random 
positions in the grid. 

This puts the enemy ship on 

■ the grid for the start of the 
game. 63 (ZX81) and 90 
(others) are the codes fox Z. 
Checks the position has not 
already been given to an iceberg 
and finds another if it has. 

> These lines do the same as 
above to pat yon on the grid. 
(62 and 89 are the codes for 

Y.) 



■ Prints out grid with current 
positions of ships and 

icebergs. 




Puzzle corner 



Can you work out how to make the grid 
bigger? 

Now work out how to add more 
icebergs too. 




270 PRINT "DIRECTION <N,S,E. 
280 INPUT D* 



•km A' 



290 LET YY=YY+(DS="S" AND YYOB) 
300 LET YY=YY-(D»="N" AND YYOl) 
310 LET YX=YX+«D»="E" AND YXOB) 
320 LET YX=YX-(D*="W" AND YXOl) 



*ia»330 IF B(YX,YY>-63 THEN GOTO 500 
*BA»340 IF B(YX,YY)=23 THEN GOTO 600 



°1 



>#BA*350 LET B<YX,YY>=62 
360 LET B<SX,SY)=0 



} 



370 LET SX=SX+SBN(YX-SX> 
380 LET SY=SY+SGN(YY-SY) 



S*1A»390 



IF B<SX,SY>=62 THEN GOTO 500 
IF B(SX,SY)=23 THEN GOTO 700 



i 



s*«A»4I0 LET B<SX,SY)=63 



420 BOTO 150 — 

500 PRINT "YOU'VE BEEN CAUGHT" 
SIO GOTD 800 

600 PRINT. "YOU'VE HIT AN ICEBERG" 
610 BOTO BOO 

700 PRINT "YOU'RE SAFE - HE'S HIT 
800 STOP 

The above listing wiil work on a ZX81. For 
other computers, make the changes below. 

**«30, 50, 70,80, HO, 120 change RND to 
■30,50,70,80,110,120 change RND to 
rtMU»50,34Q,400 change 23 to 42 
**BA»lOO p 330,41O change 63 to 90 
>*»*ei40,350,390 change 62 to 89 
A 150 PRINT CHR*<147>i 
• 150 HOME 

!290 LET YY=YY-(D»="S" AND YYOB) 
300 LET YY=YY+(D*="N" AND YYOl) 
310 LET YX=YX-CD*="E" AND YXOS) 
320 LET YX=YX+CD*="W ,, AND YXOl > 



ONE 1 



■ Clears your current position 
from the grid so you can 
specify a new one. 

■ Puts your direction in DS. 

Calculate* your new 
position, checking that you 
> don't go over the edge of the 
grid. 

Checks your new position to 
see if yon have bumped into 

■ the enemy ship or an iceberg. 
If yon have, it jumps down the 
program to tell you. 

You've moved to a safe 
. position and the code for your 
ship is put there. 

■ Calculates the enemy's new 
position. 

Checks enemy's new position 

■ to see if he has caught you or 
hit an iceberg. Jumps down 
program to tell you if he has. 

■ Enemy's code is put in the 
new position. 

- End of a rum. Loops back to 
1 50 to start another turn. 



Computers can decide 
whether an expression is true 
or false. If the answer is false 
they give it the value 0. If it 
is true, some computers give 
the value +1, others — 1. 
Lines 290-320 have to be 
changed for some computers ] 
because of this. 




The Wizard's Wall 



The wall the Wizard built to surround his secret stronghold is no ordinary 
wall. The stones in it are people, petrified by the Wizard's angry stare, and, 
what's more, it can move. If you can break a hole through it with your trusty 
catapults which fling gigantic boulders, you will destroy the Wizard's 
magic powers and turn the stones back into people again. There are 
problems though - the Wizard is working on a spell which stops missiles in 
mid-air and sends them back where they came from. Sometimes he can 
make it work. . . 

If you don't succeed, you will become just another stone in the Wizard's 
Wall!!!! 

±•10 CLS 

20 PRINT "WIZARD'S WALL" 
30 PRINT 

40 PRINT "DO YOU WANT ANY HELP?" 

50 INPUT I* 
★■*»60 IF IS(1)-"Y" THEN BOSUB 740 

70 PRINT "DIFFICULTY?" 

BO PRINT " (5=EASY, 1=DIFFICULT) " 

90 INPUT Q 

100 DIM W<B,S) 

HO DIM E(8) 

120 FOR Y=l TO 8 

130 FOR X=l TO 4 
★«A«140 LET W(X, Y)=20 

150 NEXT X 

160 NEXT Y 

170 LET Z=0 

1B0 FOR C=l TO 3 

190 LET D=INT(RND*80+21) 

20O GOSUB 430 

210 IF Z-l THEN BOTO 1150 

220 PRINT "YOU ARE "iDi" YARDS AWAY" 
★■*»230 LET W=INT(RND*41>-20 

240 IF W=0 THEN PRINT "NO WIND" 

250 IF W<0 THEN PRINT "WIND TO RIGHT" 

260 IF W>0 THEN PRINT "WIND TO LEFT": 

270 PRINT "GIVE ELEVATION (1-90)" 

280 INPUT A 

290 PRINT "GIVE SPEED" 




300 
310 
320 
330 
340 
350 
360 

★■a*370 
380 
390 
400 
410 
420 

*ba«430 
440 
A»4S0 
460 
470 
480 

★■a»490 
500 
510 
520 
530 
540 
550 
560 
570 

★■a»580 

590 
600 
★■*»610 

620 
630 
640 
650 
660 
670 
680 
690 
7O0 
710 



INPUT V 

LET A=A/180*3. 1416 

LET H=TAN<A>*<D-W)-(5*(D-W>~2>/<V*COS{A) ) A 2 
LET H=INT (H/Q) 

IF H>0 AND H<9 THEN GOSUB 540 

IF H<1 THEN PRINT "SHOT WAS TOO NEAR" 

IF H>8 THEN PRINT "SHOT WAS TOO FAR" 

IF RND>.2 THEN GOTO 200 

PRINT "THE WALL HAS MOVED..." 

NEXT C 

PRINT "YOU HAVE BEEN TURNED" 

PRINT "INTO STONE" 

STOP 

FOR 1=1 TO 30 
NEXT I 
CLS 
PRINT 
FDR Y=8 
FOR X=l 



STEP -1 



TO 1 
TO 8 

PRINT CHR* ( W ( X , Y) ) ? 

NEXT X 

PRINT 

NEXT Y 

RETURN 

GOSUB 650 

LET W(E(H>-1,H)=0 

IF V*C0S(A)>50 THEN LET W (E (H) -2, H) =0 
IF RND>.5 AND HOI THEN LET W(E(1),1)=29 
IF RND>.5 AND H>5 AND H<8 THEN LET 
W(E(H+1)-1,H+1)=0 
IF H>1 THEN GOTO 630 
FOR Y=2 TO 8 

IF RND<.5 THEN LET W (E ( Y> — 1 , Y) =0 
NEXT Y 
GOSUB 650 
RETURN 

FDR Y=l TO 8 

LET X=l - 

IF W(X,Y>=0 OR X=8 THEN GOTO 700 

LET X=X+1 

GOTO 670 

LET E<Y)=X 

IF X=l THEN LET 2=1 



The Wizard's Wall continued 

720 NEXT Y 
730 RETURN 

740 PRINT "YOU ARE ATTACK INS THE" 
750 PRINT "LAST STRONGHOLD OF THE" 
760 PRINT "NOTORIOUS WIZARD, WHO" 
770 PRINT "IS HIDDEN BEHIND AN" 
780 PRINT "ENDLESS STONE WALL," 
790 PRINT "EACH STONE BEING ONE" 
800 PRINT "OF HIS FORMER VICTIMS." 
S 10 PRINT "ONLY YOU CAN ATTACK, " 
820 PRINT "AND FREE THEM FROM" 
830 PRINT "HIS MAGIC. " 
840 PRINT "YOU MUST DESTROY THE" 
850 PRINT "WALL USING CATAPULTS, " 
860 PRINT "BUT BEWARE, THE WIZARD" 
870 PRINT "HAS THE POWER TO MOVE" 
880 PRINT "THE WALL BACK AND" 
B90 PRINT "FORTH, AND OCCASIONALLY, " 
900 PRINT "TO DEFLECT YOUR SHOTS" 
910 PRINT "BACK AT YOU. - 
920 GOSUB 1110 

930 PRINT "AFTER EACH SHOT, YOU ARE" 
940 PRINT "SHOWN A CROSS-SECTION" 
950 PRINT "OF THE WALL, SHOWING" 
960 PRINT "HOW MUCH DAMAGE THERE" 
970 PRINT "IS. " 

980 PRINT "NOTE THERE ARE CERTAIN" 
990 PRINT "KEY STONES THAT PRODUCE" 
100O PRINT "LOTS OF DAMAGE, AND" 
1010 PRINT "ALSO, THE FASTER THE" 
102O PRINT "BOULDER IS MOVING" 
1030 PRINT "HORIZONTALLY, THE MORE" 
1040 PRINT "DAMAGE IT WILL CAUSE. " 
1050 PRINT "CAN YOU DEFEAT THE" 
1060 PRINT "WIZARD IN TIME TO SAVE" 
1070 PRINT "THE THOUSANDS OF TRAPPED" 

10BO PRINT "SOULG " 

1090 GOSUB 1110 



'#:--■«' 



llOO RETURN 

lllO PRINT "PRESS A KEY 

**«1120 IF INKEY*="" THEN GOTO 1120 

a»1130 CLS 

1140 RETURN 

1150 PRINT "YOU MANAGED TO BREAK" 

1160 PRINT "A HOLE IN THE WIZARD'S" 

1170 PRINT "WALL - YOU HAVE BEATEN" 

11SO PRINT "HIS MAGIC POWERS, AND" 

1190 PRINT "FREED HIS VICTIMS." 

1200 STOP 

The above listing will work on a ZX81 . For 
other computers, make the changes below. 



EH? 



SKI 




■all RND to RND(O) 
*A«all RND to RND<1> 

•10, 450, 1130 HOME 

A10, 450, 1130 PRINT CHR*<147> ; 
★■*»60 IF LEFT* (I*, 1>="Y" THEN GOSUB 740 
★■a»140 LET W(X,Y>=29 
■a«430 FOR 1=1 TO 200 

*430 FOR 1=1 TO lOOO 
★■a«490 PRINT CHR*(W(X,Y>+32> i 

★1120 I*=GET* 

•1120 GET I* 

*1120 GET I* : IF 1*="" THEN GOTO 1120 



MS 



Changes you can make to the game 



You can make the wall thicker by changing the following lines: 
Line 1 00: change the first number to a higher one, say, 10. 
Line 130: subtract 4 from the number you used in line 100 and put the 
answer at the end of line 120. (i.e. in this case use 6.) 
Line 480: change the last number to the number you used in line 100 ( 1 
again in this case). 

If you make the wall much thicker, you will probably need more time. 
Change the last number in line 180 to a higher number to do this. 



Missile! 



This game is different from the 
others in this book because it uses 
graphics. As the computers vary so 
much in the way their graphics 
work, there is a separate % rogram 
for each one. Read the ins tructions 
on this page for how to play the 
game and then look through the 
pages that follow for the version for 
your computer. 



Howto play Missile! 

You have three missile bases, each 
capable of launching one missile. 
When you see a plane approaching, 
you must judge its height and speed 
and fire your missiles at it one by 
one. 

Your missiles are launched by 
pressing any key. The first time you 
press launches the left-hand one, 
second time the middle one and 
third time the right-hand one. 

See how many enemy planes you 
can shoot down. 



Missile! : TRS-80 version 

10 CLS 320 I 

20 DIM Y(3) ,F(3) 400 I 

30 N=l 410 I 

40 PS=INT<RND'0)*3+1> 420 ! 

50 P=INT(RND(0)*36+5) 430 I 

60 60SUB 40O 440 1 

70 FOR I=PS TO 100 STEP PS 
80 GOSUB 300 
90 F*=INKEY* 

100 IF F*="" OR N>3 THEN 130 
110 F(N)=1 
120 N=N+1 
130 FOR J=l TO 3 
140 RESET ( 32*J , 46— Y ( J ) ) 
1 50 IF F ( J > =0 OR Y < J > >45 THEN 1 90 
160 Y(J)=Y(J)+1 

170 IF POINT (32*J, 46-Y (J> > THEN 230 
1BO SET ( 32* J , 46— Y ( J ) ) 
190 NEXT 
200 NEXT 

210 PRINT @0, "MISSED" 
220 END 
230 PRINT HO, "HIT! ! ! " 
240 END 

300 RESET <I-PS,P> ; RESET CI-PS+1,P> 
310 SET (I,P) : SET (I+1,P> 



320 RETURN 
400 FOR J=l TO 3 
410 SET (J*32,47) 
420 SET (J*32+l,47) 
430 NEXT 
440 RETURN 



_ 



Missile! : VIC 20 version 



10 PRINT CHR* (147) CHR* (5> ; 
20 POKE 36879,8 
60 DIM Y<3> ,F<3> 
70 N=1:MS=2 

90 P=INT(RND(l>*9+2>*2 

HO FOR 1 = 1 TO 21 STEP RND(l>/2+.5 

120 GOSUB 300 

130 GET Ft 

140 IF F*="" OR N>3 THEN 170 
150 F(N>=-1 
160 N=N+1 



200 
210 
220 
230 
240 
250 
260 
270 
280 
282 
284 



FOR J=l TO 3 

IF F(J)=0 THEN 220 

POKE 8164+J*5-Y ( J) *22, 32 

IF V<J)=22 THEN 240 

Y(J>=Y(J)+1 

POKE 8164+J«5-Y(J> *22, 30 

IF ABS< I-J»5) <=1 AND P=Y ( J ) THEN 280 

NEXT 

NEXT 

PRINT CHR* < 147) ; "MISSED ! ! ! ! " 
END 

PRINT CHR* ( 147) ; "HIT! ! ! ! " 

POKE 36877,220 ; POKE 36878,15 

FOR K=l TO 500 : NEXT 

POKE 36877, O : POKE 36878, O 

END 

POKE 8163+I-P*22,32 
POKE 8164+I-P422, 121 
RETURN 
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Missile! : Apple version 



10 HOME 

20 HGR 

30 HCDL0R=3 

40 DIM Y(3) ,F(3> 

50 N=l : MS=5 

60 PS=INT(RND(l>*6+4> 

70 P=INT(RND(1>*135+11) 

SO GOSUB 400 

90 FOR I=PS TO 265 STEP PS 

100 X=I-PS : Y=1S9-P : C=0 : GOSUB 300 

110 X=I ; C=3 : GOSUB 300 

120 F*="" : IF PEEK (-16384) >127 THEN GET F* 

130 IF F4="" OR N>3 THEN 160 

140 F(N)=1 

150 N=N+1 

160 FOR J=l TO 3 

170 0=0 : GOSUB 350 

ISO IF F (J) =0 OR Y(J)>145 THEN 230 
190 Y(J>=Y<J>+MS 
200 C=3 : SOSUB 350 
210 X=J*70-I : Y=P-Y ( J ) 

220 IF X>-1 AND X<15 AND Y>-9 AND Y<5 THEN 270 
230 NEXT 
240 NEXT 

250 VTAB 22 : PRINT "MISSED" 
260 END 

270 VTAB 22 : PRINT "HIT ! ! V 
280 END 
'- 300 HCOLOR=C 
310 HPLOT X, Y TO X, Y-S 

320 HPLOT TO X+3,Y-2 : HPLOT TO X+12, Y-2 
330 HPLOT TO X+14,Y : HPLOT TO X,Y 
340 RETURN 
350 HCOLOR=C 

360 HPLOT 70*J, 158-Y(J) TO 70* J , 154— Y ( J > 

370 RETURN 

400 FOR J=l TO 3 

410 HPLOT 70*J-5,159 TO 70* J +5, 159 
420 NEXT 
430 RETURN 




Missile! : ZX81 version 



10 CLS 
20 DIM Y(3) 
30 DIM F(3> 
40 LET N=l 

50 LET P-INT CRND*19+2>*2 
60 FOR 1=1 TO 48 
70 PLOT I , P 

80 PLOT I+l.P ■ 
90 UNPLOT I-l,P 1 
100 LET B*=INKEY* 

110 IF Bi= " " OR N>3 THEN GOTO 140 

120 LET F(N)=1 

130 LET N=N+1 

140 FOR J=l TO 3 

150 IF F(J)=0 THEN GOTO 190 

160 UNPLOT J*16,Y(J> 

170 IF Y(J>=42 THEN GOTO 210 

180 LET Y(J)«Y(J)+1 

190 PLOT J*I6,Y<J> 

200 IF P=Y(J) AND (J* 16= I OR J*16= 

THEN GOTO 260 
210 NEXT J 
220 NEXT I 

230 CLS 

240 PRINT "MISSED" 
250 STOP 
260 CLS 

270 PRINT "HIT" 
280 STOP 
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Adding to the programs 



Here are some ideas for additions 
you can make to the programs in 
this book or to your own programs. 
In most cases you won't be able to 
add these to a ZX81 with only IK as 
the games themselves fill almost all 
its memory space, but you should 
find there is plenty of room on the 
other computers. 

Remember you will either have to 
restrict your additions to the spare 
line numbers in a program or 
renumber the program. If you 
decide to renumber, take care you 
change all the GOTO and GOSUB 
lines too. 

■ 

Getting the computer to tell you 
how to play 

You can add a 
section to any 
program to make 
the computer print 
instructions telling 
you what to do. The 
easiest way to do 
this is to add some lines, such as those 
below, at the beginning of the 
program and then put a sub-routine at 
the end. 



10 PRINT "TITLE OF GAME " 

11 PRINT "DO YOU WANT TO" 

12 PRINT "KNOW HOW TO PLAY?" 
15 INPUT I* 

S2X17 IF I*(1)="Y" THEN GOSUB lOOO 
★■±•17 IF LEFT*< I*, 1 ) ="Y" THEN GOSUB IOOO 

main program goes here 

100O PRINT "WHAT YOU HAVE TO" 

1010 PRINT "DO IS " 

19V9 RETURN 

You can add as many print statements 
as you like for the instructions, just 
remember to put a number and the s 
word PRINT at the beginning of each *i 
one. Restrict the length of the part 
inside the quotation marks to the 
number of characters your computer 
can print on one line. Don't forget to 
put a RETURN line at the end or the 
36 program won't work. 





Making the computer 
stop and waitfor you jcome 

ho*AY 

uf>! 

If your instructions are very long, you 
may want to insert this sub-routine 
which stops the program running at a 
particular point until you press a key. 
This way you can stop the instructions 
scrolling off the top of the screen 
before you have read them. Put a 
GOSUB line at the place you want the 
program to stop and then put this sub- 
routine at the end. 

10OO PRINT "PRESS A KEY TO CONTINUE "i 
SZX1010 IF INKEY«="" THEN GOTO 1010 
*1010 I*=GET* 
#1010 GET It 

A101O GET I* : IF 1*="" THEN GOTO 1010 
1020 PRINT 
1030 RETURN 



Making the computer "talk" to 
you 




You can make the computer ask you 
questions and react to your answers. 
For instance, here is an addition which 
will make the computer refuse to play 
with you unless your name begins with J. 

1 PRINT " WHAT IS YOUR NAME?" 

2 INPUT I* 

3 IF I»UX>"J" THEN GOTO IOOO 

3 IF LEFT*U», DO"J* THEN GOTO IOOO 

4 PRINT "DK-YOU CAN PLAY." 

5 PRINT "ARE YOU READY?" 
b INPUT J* 

ZX7 IF J*(1X> ,- Y" THEN GOTO 5 
±•7 IF LEFT* (J*, 1 ) <>"Y" THEN GOTO 5 



main program here 



IOOO PRINT 
1010 PRINT 
1020 PRINT 
1030 PRINT 



"SORRY THIS GAME 
"ONLY FOR PEOPLE" 
"WHOSE NAMES BEGIN 
"WITH J" 



IS" 



Here is another one where the 
computer dares you to be brave 
enough to play. 

10 PRINT "VERY SCARE Y GAME" 

12 PRINT " ARE YOU BRAVE ENOUGH " 

14 PRINT "TO TACKLE THE GREEN" 

15 PRINT "HfilRY MONSTER?" 
1A INPUT I* 

S ZX17 IF IS<1>="Y" THEN GOTO 20 
*BA«17 IF LEFT* <I4,1>="Y" THEN GOTO 20 
IB PRINT " COWARD" 
19 STOP 



cases you can add a single line to your 
program at the place you want the 
sound. In others, you need several 
lines and it is best to put these in as a 
sub-routine. 

As an example, here is the sound of 
a shot for the BBC. You can experiment 
with where to put it in the program, but 
you must give it a line number to make 
it worK: 

SOUND 0,-15,5, 10 

At the back of the VIC manual you 
will find some useful sub-routines for 
sounds such as "laser beam", 
"explosion" and "red alert". Put a 
GOSUB line where you want the sound 
to appear, number the sub-routine and 
add a RETURN at the end of it. 



You could combine this with the 
instruction sub-routine by taking lines 
1 1 to 17 from the instructions section 
on this page and putting them at lines 
20 to 26 of this program. You can then 
start the main program at line 30 and 
add the instruction sub-routine at the 
end. 



Would you like another go? 

Instead of typing RUN each time you 
play a game, you can make the 
computer ask you if you'd like another 
go. Put these lines at the end of the 
program, just before the last STOP 
statement. 

10O0 PRINT "DO YOU WANT ANOTHER GO? " 
1010 INPUT I* 
S ZX1020 IF I*<1>="V" THEN RUN 
*BA#1020 IF LEFT*<I*,1>="Y" THEN RUN 
1030 PRINT "OK THEN - BYE" 
1040 STOP 



Change line 
numbers according 
to your program. 




Adding sound effects 



The BBC, VIC 20, ZX Spectrum and 
some Apples are able to produce 
sounds and you can add lines to your 
programs to make them do so at 
appropriate places. You could add an 
explosion for instance, or a little tune 
which plays if you win. All the 
computers need different instructions 
to make sounds though, so you will 
have to look at your manual. In some 




Special note for BBC and 
Spectrum users 

If you have a BBC or a ZX Spectrum 
you may find that some of the games 
in this book run too fast for you. You 
will find a box next to these games 
containing instructions for 
changing the speed. Remember, to 
slow the game up you always need 
to use a higher number. Later 
models of the BBC may run up to 
twice as fast as the earlier models, 
and this could make the games 
appear impossible on the first run. 
Be prepared to make big changes 
to the speed number to correct this. 



Writing your own programs 

As you work through the games in 
the book, you will probably find 
yourself making more and more 
changes to them and eventually 
wanting to write new games of your 
own. On these two pages you will 
find some hints on how to set about 
doing this. 

Before you start, it is a good idea to 
stop and think about what your 
computer can and cannot do. 




* It can ask you for information. 




* It can store information 



* It can select numbers at random by 
using RND. 




* It cannot do anything unless you tell it 
to. 



*It can make decisions by comparing 
items of information in various ways. 





* It can tell you the results of its 
calculations and decisions and also 
what is stored in its memory. 



*Provided you use its language 
correctly, it can do only exactly what 
you tell it, even if it is silly. 

Remember, when you are trying to 
work out a game, notto include 
anything which your computer won't 
be able to do. 



Planning a game 



Writing the program 



Before you can tell the computer how 
to play your game, you must know 
exactly how to play it and what the 
rules are yourself. The computer will 
need a series of simple logical 
instructions, so work out your game in 
your head or on paper first and then 
break it down into simple steps. 

Next write a plan (in English - don't 
try to use BASIC yet) of all the stages of 
the game in order. 

Here is a plan for a simple shooting 
game, such as firing cannon balls at a 
pirate ship or shooting laser beams at 
an alien invader, to give you an idea. 



PLAN 

;/) flR/AfT TITTLE AND 
INSTRUCTIONS 

2) CHOOSE A TARCET 
FOR THIS OAtAE 

3) BE<ilN A LOOP TO 
GIVE THE PLAYER 
N COBS 

4-) get a shot from 
the Player 

s) ch£ck if swot was 
on target 

6) print message 

DEPENDING ON 

accuracy of shot 

7) <jO 6ACK FOR 

qo IF SHOT 
WAS UNSUCCESSFUL 



The next stage is to convert your plan 
into BASIC. Each step in your plan may 
need several lines in BASIC. Don't 
forget to leave gaps when numbering 
your program lines so you can go back 
and add extra ones if you need to. 

Do a first draft of the program on 
paper first and then start testing on the 
computer. Your computer will spot 
errors much more quickly than you 
will see them yourself and may give 
you a clue as to what is wrong. 
Remember that debugging programs 
is a long, tedious process even for 
expert programmers, so don't expect 
to get yours right first time. 





Once you have got the core of the 
program working, you can add to it. 
Scoring, extra comments, more 
targets etc. can all be incorporated 
later. You could add sections from the 
programs in this book to your games. 

Don't expect to be able to write 
exciting and original games straight 
away. Keep your ideas very simple 
and be prepared tcadapt them as you 
go along. You may find you have 
included something in your game 
which is easy for humans to do but 
very difficult for a computer. As you 
get more experienced you will begin 
to know instinctively what your 
computer can do and find it easier to 
write programs for it. 



Summary of BASIC 



This section lists some common BASIC words and describes what they 
make the computer do and how they are used. Most of them have been used 
in the programs in this book, so you can check back through the book to see 
how they work in a game. Not all the words can be used on all the 
computers mentioned in 1 this book. The conversion chart on page 46 shows 
what you can use instead. 



LET tells the computer to label a section of its 
memory and put a particular value in it e.g. LET 
A= 6 means label a section of memory "A" and put 
the value 6 in it. "A" is called a "variable" and putting 
something in it is called "assigning a value to a 
variable". 

Some variable labels are followed by a dollar 
sign e.g. A$. This means they are for "strings", 
which can contain any number of characters, 
including letters, numbers and symbols. 



PRINT tells the computer to display things on the 
screen and you can use it in several ways: 

A message enclosed in quotation marks with 
PRINT in front of it will be displayed on the screen 
exactly as you typed it. The section inside quotes 
does not have to be in BASIC, it can be anythingyou 
like. 

PRINT followed by a variable label e.g. PRINT A 
or PRINT A$ tells the computer to display the 
contents of that variable on the screen. 

PRINT can also do calculations and then display 
the results e.g. PRINT 6*4 will make the computer 
display 24. 

You can use PRINT by itself to leave an empty 
line. 



RND tells the computer to choose a number at 
random. Different computers use different forms of 
RND and you can see what these are in the 
conversion chart on page 46. On Sinclair computers 
by itself produces a number between and 
99999999. You can vary the limits of the number it 
'chooses by multiplying RND and adding to it. E.g. 
RND * 20 produces a number between and 
19.99999999, while RND*20+ 1 produces anumber 
between 1 and 20.99999999. 
See INT for how to produce only whole numbers. 
See CHR$ for how to produce letters and other 
keyboard characters at random. 





INT is short for integer, which means whole 
number. For positive numbers, it tells the computer 
to ignore everything to the right of the decimal 
point. Eg. 1NT(20.999) is 20. For negative numbers, 
it ignores everything to the right of the decimal 
point and "increases" the number to the left of it by 
one e.g. INT( - 3.6) is -4. 

INT is often used with RND, like this: 
INT(RND * 20 + 1) which tells the computer you want 
it to choose a whole number between 1 and 20. 

CHR$ converts numbers into letters. Apart from the 
ZX8 1 , all the computers in this book use the 
ASCII * set of keyboard characters in which each 
character corresponds to a certain number. E.g. 
letter A has the code number 65 and PRINT 
CHR$(65) will display an A on the screen. 

You can use CHR$ with INT and RND to make the 
computer select random letters, like this: 

CHR$(INT(RND*26+65)) 
This line will produce random letters on a ZX 
Spectrum (see conversion chart for other 
computers). 




FOR is used to start a "loop" which will make the 
computer repeat part of a program a certain 
number of times. It must be followed by a variable 
(such as G to stand for the number of goes allowed 
in a game), and the variable must be given start and 
end values (such as 1 TO 10.) 

The end of the loop is marked by a NEXT line 
(NEXT G in this example) which increases the value 
of the variable by 1 each time and then sends the 
computer back to the FOR line again. When the 
variable reaches its end value, the computer 
ignores the NEXT line and carries on to the line 
which follows it. Every FOR must have a NEXT or 
you will get a bug. 

INPUT labels a space in the computer's memory, 
prints a question mark and then waits for you to 
type something which it can put in this memory 
space. It will not carry on with the rest of the 
program until you press RETURN, ENTER or 
NEWLINE. 

You can use number or string variables with 
INPUT, but if you use a number variable the 
computer will not accept letters from you. 





* American Standard Code for Information Interchange (see page 45) 



INKEY$ checks the keyboard to see if a key is 
being pressed and if so which one. It does not wait 
for you to press a key like INPUT does. It is usually 
used in a loop which makes the computer go round 
checking the keyboard lots of times. This is 
because computers work so quickly, you wouldn't 
have a chance of pressing a key in the time it takes 
the computer to do one check. 

If you haven't pressed a key before the loop 
finishes, the computer carries on with a string 
containing nothing (called a "null" string). 
NB Apple and VIC do not use INKEY$. 



GET is used instead of INKE Y$ on VIC and Pet 
computers. 



GOTO makes the computer jump up or down the 
program ignoring the lines in between. You must 
put the number of the line you want it to jump to 
after the GOTO instruction. 



GOSUB tells the computer to leave the main 
program and go to a sub-routine. GOSUB must be 
f olowed by the number of the first line of the sub- 
routine. At the end of the sub-routine you must have 
a RETURN line. This sends the computer back to 
the main program to the line immediately following 
the GOSUB line. A GOSUB without a RETURN in a 
program will give a bug. 



IF . . . THEN tells the computer to decide if an 
expression is true or false, and do different things 
depending on the answer. It is used with the 
following signs, and also with AND or OR: 

=the same as 

<lessthan 

>greater than 
< = less than or the same as 
> = greater than or the same as 
< > not the same as 

If the computer decides an expression is true, it 
carries on to do the instruction which follows 
THEN. If it decides it is false, it ignores the rest of 
that line and goes on to the next one. 



CLS is used to clear everything off the screen 
without removing or changing anything in the 
memory. It is useful for removing the listing from 
the screen at the beginning of a RUN or in games 
when you want the player to react to something 
seen for a limited amount of time. (NB Apple and 
VIC do not use CLS - see conversion chart). 



HOME is used by Apple computers instead of CLS 
to clear the screen. 



ABS ignores plus and minus signs in front of 
numbers and takes their "absolute" values. E.g. 
ABS( - 10) is 10 and ABS( + 10) is also 10. 



VAL takes the numeric value of numbers written as 
strings. In effect, it tells the computer to ignore the 
dollar sign and treat the string as an ordinary 
number variable. E.g. if B= "60" then VAL(I$) is the 
number 60. 



ASC converts a character into its ASCII code 
number e.g. ASC("3") gives SI. The expression in 
brackets must be a string e.g. ASC(A$) or 
ASC("20"). 

NB ZX8 1 and ZX Spectrum do not use ASC, though 
the Spectrum does use the ASCII code. 



CODE is used by ZX8 1 and Spectrum in place of 
ASC, Like ASC it must always be followed by a 
string. Remember that the ZX8 1 uses different code 
numbers from the other computers. 



TAB moves the cursor across the screen to a 
specified column number. It is usually used with 
PRINT to display something in the middle of the 
screen. The number of spaces you want the cursor 
moved is put in brackets after TAB. The maximum 
number you can use depends on the screen width 
of your computer. 



SGN tells the computer to find out the sign of a 
number. It produces - 1 for a negative number, 
for zero and + 1 for positive numbers. E.g. 
SGN( - 30) is - 1, SGN(7) is + 1 and SGN(O) is 0. 

DIM tells the computer how much memory space 
will be needed for an "array" (a row or a grid). E.g. 
DIM X(6) tells the computer to set aside an area 
large enough to contain a row of 6 elements and 
labelled X. DIM A(8,8) means a memory space 
labelled A and big enough to take 8 elements 
across and 8 down is needed. The number of 
elements of data used in the program must 
correspond to the numbers in brackets after DIM 
or you will get a bug. 

SQR takes square roots of numbers. E.g. SQR( 16) 
gives the answer 4. 

SIN calculates the sine of an angle. In aright-angled 
triangle the length of the side opposite an angle, 
divided by the length of the Hypoteneuse (the side 
opposite the right angle) is the sine of that angle. 
When you use SIN in a program, the angle you are 
using it with must be measured in radians, not 
degrees. 

ATN is one of the trig, functions which computers 
can calculate (see also SIN above). It stands for 
arctangent and it is important to remember that it 
gives an answer in radians, not degrees. You will 
need to use a maths book to find out how this works 
if you do not already know about it. 

STOP tells the computer not to go any further ina 
program. Computers other than the ZX8 1 can use 
END instead. 

PEEK is a way of finding out what is in a specific 
area of the computer's memory. You need to use it 
with a number which specifies an "address" in the 
memory. 

NBnot used on BBC. 

POKE is a special way of putting information in the 
computer's memory by using a memory "address'. 
NBnot used on BBC. 



ASCII chart 



ZX81code chart 



Code 


ASCII 


Code 


ASCII 


number 


character 


number 


character 


32 


space 


62 


> 


33 


i 

» 


63 


r 


34 




64 




35 


it 
# 


65 


A 


36 


<• 


66 


B 


61 


0/ 
70 


67 


c 


38 


& 


68 


D 


39 


I 


69 


E 


A A 


( 


70 


F 


A 1 

41 


) 


71 


G 


A A 

42 




72 


H 


A *> 

43 


+ 


73 


T 
I 


jl A 

44 




74 


J 


45 




75 


K 


AC 




76 


L 


42 


/ 


11 


M 


4o 


A 
U 


TO 

78 


N 


4SJ 


1 


29 


O 


5U 


2 


80 


P 


51 • 


3 


81 


Q 


52 


4 


82 


-n 
K 


53 


5 


83 


S 


54 


o 


84 


T 


55 


2 


85 


TT 

u 


56 


8 


86 


V 


57 


9 


87 


w 


58 


* 


88 


x 


59 


* 


89 


Y 


60 


< 


90 


Z 


61 











— - 


■ 




Code 
number 


zxsi 

character 


Code 
number 


zxei 

character 


11 




41 


D 


12 


£ 


42 


E 


13 


$ 


43 


F 


14 




44 


G 


15 




45 


H 


16 


( 


46 


I 


11 


) 


47 


T 


18 


> 


48 


K 


19 


< 


49 


L 


20 




50 


M 


21 


+ 


51 


N 


22 




52 


O 


23 




53 


P 


24 


1 


54 





25 


1 


55 


R 


26 


L. . . 


56 


S 


An 

27 




57 


T 


28 





58 


U 


29 


1 


59 


V 


30 


A 

2 


60 


w 


31 


3 


61 


X 


32 


4 


62 


Y 


33 


5 


63 


Z 


34 


6 






35 


7 






36 


8 






37 


9 






38 


A 






39 


B 






40 


C 







Chart of screen sizes 





Max. number of 

characters across 

(or number of columns) 


Max. number of 

lines down 

{or number of rows} 


VIC 20 


22 


23 


TRS-80 


64 


16 


BBC 


20/40/80 


16/24/32 


ZX81 


32 


22 


ZX Spectrum 


32 


22 


Apple 


40 


25 



Conversion chart 



This quick reference chart shows some of the variations in the BASIC used by the machines in this book. It does 
not include instructions for graphics, sound or colour as these vary so enormously from machine to machine. 
Note also that although most computers (except the BBC) use PEEK and POKE, they do not use the samesystem 
of memory addresses, so the numbers used with PEEK and POKE must be changed for each computer. 





BBC 


VIC/Pet 


Apple 


TRS-80 


ZX Spectrum 


ZX81 


Select zandom 
number between 
and 0.99999999 


RND(l) 


RND(l) 


RND(l) 


RND(O) 


RND 


RND 


Select random 
number between 1 
andN 


RND(N) 


RND(1)*N+1 


RND(1)*N+1 


RND(N) 


RND*N+ 1 


RND*N+1 


Select random letter 
between A and Z 


CHRSf KNEW 261 +64} 


CHR$dNT(RND(l) 

*26+65)) 


CHR$(INT(RND(1) 
1 26+65)) 


CHRSf RNDf 261 + 64) 




CHR SflNTf END * 26 + 381 1 


Clear screen 


CLS 


PRINT CHR$( 147) 


HOME 


CLS 


CLS 


CLS 


Check keyboard to 
see if key being 
pressed 


INKEY$(N) 


GETX$ 


IF PEEK(- 16384) 
> 127 THEN GET X$ 


INKEYS 


INKEYS 


INKEY$ 


Convert characters 
into code numbers 


ASC("X") 

(using ASCII code) 


ASC("X") 

(using ASCII code) 


ASC("X") 

(using ASCII code) 


ASC("X") 

(using ASCII code) 


CODE("X") 
(using ASCII code) 


CODE("X") 
(using ZX81 code) 


move cursor up 


PRINT CHR$( 11) 


PRINT CHR$( 145) 


CALL -998 


PRINT CHR$(27) 


PRINT CHRSf 11) 


PRINT CHR$(112) 


Move cursor down 


PRINT CHR$( 10) 


PRINT CHR$( 17) 


PRINT CHR$( 10) 


PRINT CHR$(26) 


PRINT CHRSf 10) 


PRINT CHRSf 113) 


Move cursor left 


PRINT CHR$(8) 


PRINT CHRSf 157) 


PRINT CHR${8) 


PRINT CHR$(24) 


PRINT CHR$(8) 


PRINT CHR$( 114) 


Move cursor right 


PRINT CHR$(9) 


PRINT CHRSf 29) 


PRINT CHR$(21) 


PRINT CHR$(25} 


PRINT CHR$(9) 


PRINT CHRSf 115) 


Take 1st N 
characters of string 


LEFT$(A$,N) 


LEFT$(A$,N) 


LEFT$(A$,N) 


LEFT$(A$,N) 


A$(lTON) 


ASCI TON) 


Take last N 
characters of string 


RIGHT$(A$,N) 


RIGHTS A$,N) 


RIGHT$(A$,N) 


RIGHTS(A$,N) 


ASfNTO ) 


A$(NTO ) 


Take middle N 
characters of string 


MID$(A$,N1,N2) 


MID$(A$,N1,N2) 


MID$(AS,N1,N2) 


M1D$(A$,N1,N2) 


A$(NlTON2) 


A$(NlTON2) 



Ton may find that your answers to 
some of the puzzles are different to 
the ones givenhere. As long as they 
work on your computer then this 
doesn't really matter, but check to 
see if they are as neat and simple as 
the answers in the book. 



Page 5 

Robot Missile 

Line 90 tells the computer how many 
times to loop round and get a guess 
from you. So, for more chances of 
guessing the secret code letter, 
change the last number in line 90 to a 
higher one. For less chances, change 
it to a lower one. 



Page 7 

The Vital Message 



Page 11 

Desert Tank Battle 

Add the following lines to the program 
to add the possibility of the robots 
seeing you: 

175 IF RND< . 05 THEN GOTO 250 

250 PRINT "THEY'VE SEEN YOU- AABB6HHHH " 

260 STOP 

Change the RND in line 175 to the 
version your computer needs. You can 
change .05 to any number between 
and 0.999, but remember that the 
higher the number you put here the 
greater the chance of the robots 
seeing you. 



Page 13 

Battle at Traitor's Castle 



This is a difficult puzzle, so don't worry 
if you couldn't do it. Try out the answer 
anyway. Add these lines to get the two 
targets. 



In this program, lines ISO and 160 are a 
"delay" loop. They make the computer 
do nothing for a certain length of time 
before going on to the next instruction 
in the program which is to clear the 

message offthe screen. To make the szx=7 let p»=chr»(p+si> 
messagestayonthescreenlonger, \V ^T^ult^^n^* 

you need to make the computer loop 
round more times. You can do this by 
changing the last number in line ISO to 
a higher one. 



55 LET P=INTtRND+.5>S4+l 



ISO LET 5»S+P 



Page 9 
Shootout 

To make it possible for the computer 
to miss too, add the following lines in 
addition to those in the 'Making the 
game harder" box. 



Page 15 
Robot Invaders 

You can get 100 points for U, V, W, X or 
Y and 10 points for the others by 
making these changes. 



220 LET H=H+10 
225 IF P»>"T" AND P*<* 
H-H+90 



THEN LET 



155 IF RNIX.l THEN GOTO 250 

250 PRINT "HE SHOOTS BUT MISSES" 

260 GOTO 90 

Line 156 may need RNEK^orRNEKO), 
depending on your computer. 



Page 17 
SecretWeapon 

You can add the scoring system in the 



puzzle by putting these extra lines into 
the program. 

15 LET S-O 

145 IF Z<-3 THEN LET S-S+l 
19t> GOTO 217 
21S LET S-S+10 

217 PRINT "YOU SCORED "|S|" POINTS" 



Page 19 
Escape I 

This is the simplest way to add three 
robots to the game, though it makes 
the game rather difficult to win. 

22 FOR R-l TO 3 
25 PRINT "ROBOT ";R 
3O0 NEXT R 
310 STOP 



Page 21 

Pirate Dogfight 

To make your chance of hitting the 
pirate equal to his chance of hitting 
you, change the .7 in line 290 to .5. 



Page 23 

Supersonic Bomber 

To get more targets each time, change 
the 5 in lines 30, 70 and 120 to a higher 
number. You must put the same 
number in all three lines. 



Page 25 
Iceberg 

You can make the grid bigger by 
changing all the 8s in lines 20, 50, 70, 
80, 110, 120, 160, 170,290and310toa 
bigger number. (Use the same 
number each time.) 

To add more icebergs change the 4 
in line 30 to a higher number. 



Going further 

Here is a list of books you should 
find useful if you want to find out 
more about computers or writing 
programs. 

Usborne Guide to Computers by 

Brian Refhn Smith, Usborne 
Understanding the Micro by 

Judy Tatchell and Bill Bennett, 
Usborne 

Introduction to Computer 
Programming by Brian Refhn 
Smith, Usborne 
Illustrating BASIC by Donald 
Alcock, Cambridge University 
Press 

Fred Learns about Computers, 

Macdonald & Evans 
The BASIC Handbook by David 
A. Lien, Compusoft Publishing 
The Computer Book by Robin 
Bradbeer et aL BBC Publications 



First published in 1982 by 
Usborne Publishing Ltd, 20 
Garrick Street, London WC2E 
9BJ, England. 

© 1982 Usborne Publishing Ltd 
The name Usborne and the 
device # are Trade marks of 
Usborne Publishing Ltd. 

All rights reserved. No part of 
this publication may be 
reproduced, stored in a retrieval 
system or transmitted in any form 
or by any means, electronic, 
mechanical, photocopying, 
recording or otherwise, without 
the prior permission of the 
publisher. 



Printed in Spain by 
ELEXPURU, S. A. L — Bilbao 



Usborne Computer Programs - 

Each of these colourful new books contains 14 simple games programs to 
play on a microcomputer.* Alongside the programs there are 

changing them. Through playing these games even complete beginners 
will quickly begin to understand how a simple program works and be 
itching to write their own. There are tips and hints on writing programs 
and a summary of BASIC at the back of each book and also a chart which 
will help you convert programs in magazines and other books to work on 



'The programs in these books are suitable for use on the following 
micros: ZX81, BBC, TRS-80, VIC 20, Pet, Apples which use Palsoft BASIC 





Other Computer Titles 





they work and what they 
can do, with lots of ideas 
for things you can do 
with a micro. 



A step-by-step guide to 
programming in BASIC 
for absolute beginners 
With lots of programs to 
run on any 




Invaders, chess and 
other games, with lots of 
tips on how to beat the 
computer. 



Published in Canada by Hayes Publishing Ltd, 3312 Mainway, Burlington, Ontario, Canada, L7M1A7. 
Published in the USA by Hayes Books, 423S South Memorial Drive, Tulsa, Oklahoma, USA. 



ISBN 086020 685 8 



Printed in Spain by ELEXPURU, S. A. L- Bilbao 



